(mouse-buffer-menu): Don't select the event's window,
authorRichard M. Stallman <rms@gnu.org>
Tue, 1 Jun 1993 22:19:16 +0000 (22:19 +0000)
committerRichard M. Stallman <rms@gnu.org>
Tue, 1 Jun 1993 22:19:16 +0000 (22:19 +0000)
if event has frame instead.

lisp/mouse.el

index 38a9a5a6d65c90975c4e96643074a5a34581551b..80a7c0436f8370f06cb3a2f94efaf670b3adf54a 100644 (file)
@@ -258,7 +258,7 @@ and selects that window."
          (window (posn-window (event-start event))))
       (if buf
          (progn
-           (select-window window)
+           (or (framep window) (select-window window))
            (switch-to-buffer buf))))))
 \f
 ;;; These need to be rewritten for the new scroll bar implementation.